Imports Microsoft.VisualBasic

Public Class Presupuesto
    Private _id As Integer
    Private _fecha As String
    Private _condVenta As String
    Private _atencion As String
    Private _garantias As String
    Private _entrega As String
    Private _plano As String
    Private _neto As Integer
    Private _iva As Integer
    Private _total As Integer
    Private _gastosgeneralesporcentaje As Integer
    Private _utilidadporcentaje As Integer
    Private _utilidadmateriales As Integer
    Private _descuentoPorcentaje As Integer
    Private _fkCliente As Integer
    Private _fkvendedor As String
    Private _requisicion As String
    Private _ArraySubProyectos As New ArrayList
    Private _estado As String
    Private _estimadosenor As String
    Private _precio As String
    Private _condicion As String
    Private _plazoentrega As String
    Private _lugarentrega As String
    Private _validezoferta As String

    Public Sub New(ByVal id As Integer, ByVal fecha As String, ByVal condVenta As String, ByVal atencion As String, ByVal garantias As String, ByVal entrega As String, ByVal plano As String, _
                    ByVal neto As Integer, ByVal iva As Integer, ByVal total As Integer, ByVal gastosgeneralesporcentaje As Integer, ByVal utilidadporcentaje As Integer, ByVal utilidadmateriales As Integer, _
                    ByVal descuentoPorcentaje As Integer, ByVal fkCliente As Integer, ByVal fkvendedor As String, ByVal requisicion As String, ByVal estado As String, Optional ByVal estimadosenor As String = "", _
                    Optional ByVal precio As String = "", Optional ByVal condicion As String = "", Optional ByVal plazoentrega As String = "", Optional ByVal lugarentrega As String = "", Optional ByVal validezoferta As String = "")
        Me._id = id
        Me._fecha = fecha
        Me._condVenta = condVenta
        Me._atencion = atencion
        Me._garantias = garantias
        Me._entrega = entrega
        Me._plano = plano
        Me._neto = neto
        Me._iva = iva
        Me._total = total
        Me._gastosgeneralesporcentaje = gastosgeneralesporcentaje
        Me._utilidadporcentaje = utilidadporcentaje
        Me._utilidadmateriales = utilidadmateriales
        Me._descuentoPorcentaje = descuentoPorcentaje
        Me._fkCliente = fkCliente
        Me._fkvendedor = fkvendedor
        Me._requisicion = requisicion
        Me._estado = estado
        Me._estimadosenor = estimadosenor
        Me._precio = precio
        Me._condicion = condicion
        Me._plazoentrega = plazoentrega
        Me._lugarentrega = lugarentrega
        Me._validezoferta = validezoferta

    End Sub


    Public Property ArraySubProyectos() As ArrayList
        Get
            Return _ArraySubProyectos
        End Get

        Set(ByVal value As ArrayList)
            _ArraySubProyectos = value
        End Set
    End Property


    Public Property id() As Integer
        Get
            Return _id
        End Get

        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property fecha() As String
        Get
            Return _fecha
        End Get

        Set(ByVal value As String)
            _fecha = value
        End Set
    End Property

    Public Property condVenta() As String
        Get
            Return _condVenta
        End Get

        Set(ByVal value As String)
            _condVenta = value
        End Set
    End Property

    Public Property atencion() As String
        Get
            Return _atencion
        End Get

        Set(ByVal value As String)
            _atencion = value
        End Set
    End Property

    Public Property garantias() As String
        Get
            Return _garantias
        End Get

        Set(ByVal value As String)
            _garantias = value
        End Set
    End Property

    Public Property entrega() As String
        Get
            Return _entrega
        End Get

        Set(ByVal value As String)
            _entrega = value
        End Set
    End Property

    Public Property plano() As String
        Get
            Return _plano
        End Get

        Set(ByVal value As String)
            _plano = value
        End Set
    End Property

    Public Property neto() As Integer
        Get
            Return _neto
        End Get

        Set(ByVal value As Integer)
            _neto = value
        End Set
    End Property

    Public Property iva() As Integer
        Get
            Return _iva
        End Get

        Set(ByVal value As Integer)
            _iva = value
        End Set
    End Property

    Public Property total() As Integer
        Get
            Return _total
        End Get

        Set(ByVal value As Integer)
            _total = value
        End Set
    End Property

    Public Property gastosgeneralesporcentaje() As Integer
        Get
            Return _gastosgeneralesporcentaje
        End Get

        Set(ByVal value As Integer)
            _gastosgeneralesporcentaje = value
        End Set
    End Property

    Public Property utilidadporcentaje() As Integer
        Get
            Return _utilidadporcentaje
        End Get

        Set(ByVal value As Integer)
            _utilidadporcentaje = value
        End Set
    End Property

    Public Property utilidadmateriales() As Integer
        Get
            Return _utilidadmateriales
        End Get

        Set(ByVal value As Integer)
            _utilidadmateriales = value
        End Set
    End Property

    Public Property descuentoPorcentaje() As Integer
        Get
            Return _descuentoPorcentaje
        End Get

        Set(ByVal value As Integer)
            _descuentoPorcentaje = value
        End Set
    End Property

    Public Property fkCliente() As Integer
        Get
            Return _fkCliente
        End Get

        Set(ByVal value As Integer)
            _fkCliente = value
        End Set
    End Property

    Public Property fkvendedor() As String
        Get
            Return _fkvendedor
        End Get

        Set(ByVal value As String)
            _fkvendedor = value
        End Set
    End Property

    Public Property requisicion() As String
        Get
            Return _requisicion
        End Get

        Set(ByVal value As String)
            _requisicion = value
        End Set
    End Property

    Public Property estado() As String
        Get
            Return _estado
        End Get

        Set(ByVal value As String)
            _estado = value
        End Set
    End Property



    Public Property estimadosenor() As String
        Get
            Return _estimadosenor
        End Get

        Set(ByVal value As String)
            _estimadosenor = value
        End Set
    End Property

    Public Property precio() As String
        Get
            Return _precio
        End Get

        Set(ByVal value As String)
            _precio = value
        End Set
    End Property

    Public Property condicion() As String
        Get
            Return _condicion
        End Get

        Set(ByVal value As String)
            _condicion = value
        End Set
    End Property

    Public Property plazoentrega() As String
        Get
            Return _plazoentrega
        End Get

        Set(ByVal value As String)
            _plazoentrega = value
        End Set
    End Property

    Public Property lugarentrega() As String
        Get
            Return _lugarentrega
        End Get

        Set(ByVal value As String)
            _lugarentrega = value
        End Set
    End Property

    Public Property validezoferta() As String
        Get
            Return _validezoferta
        End Get

        Set(ByVal value As String)
            _validezoferta = value
        End Set
    End Property

End Class
